COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	  1) MFNTRP.SAI[MF,DEK] and 2) MFNTRP.SAI[MF,DRF]	1-22-81 11:13	pages 4,4
C00005 00003	  1) MFNTRP.SAI[MF,DEK] and 2) MFNTRP.SAI[MF,DRF]	1-22-81 11:13	pages 6,6
C00006 ENDMK
C⊗;
  1) MFNTRP.SAI[MF,DEK] and 2) MFNTRP.SAI[MF,DRF]	1-22-81 11:13	pages 4,4

**** File 1) MFNTRP.SAI[MF,DEK]/4P/65L
1)		IFWAITS print(""&'12) # terminal gets <linefeed>; ENDWAITS
1)		IFTENEX print(nextline&"		") ENDTENEX # fake it;
1)		setprint("","F"); print(nextline,
**** File 2) MFNTRP.SAI[MF,DRF]/4P/65L
2)		IFWAITS print(""&'12) # terminal gets <linefeed>;
2)		ELSEC print(nextline&"		") ENDC # fake it;
2)		setprint("","F"); print(nextline,
***************


**** File 1) MFNTRP.SAI[MF,DEK]/4P/84L
1)	IFWAITS print(""&'12) # terminal gets <linefeed>; ENDWAITS
1)	IFTENEX print(nextline&"		") ENDTENEX # fake it;
1)	setprint("","F"); print(nextline,
**** File 2) MFNTRP.SAI[MF,DRF]/4P/84L
2)	IFWAITS print(""&'12) # terminal gets <linefeed>;
2)	ELSEC print(nextline&"		") ENDC # fake it;
2)	setprint("","F"); print(nextline,
***************


**** File 1) MFNTRP.SAI[MF,DEK]/5P/89L
1)	internal integer bchan # channel for binary input;
**** File 2) MFNTRP.SAI[MF,DRF]/5P/88L
2)	IFTOPS20 require "MFF20.SAI" source_file; ENDTOPS20
2)	internal integer bchan # channel for binary input;
***************


**** File 1) MFNTRP.SAI[MF,DEK]/6P/76L
1)					ENDWAITS
1)					IFTENEX outstr(inbuf[1 to ∞-1]);
1)					begin string s; s←inchwl;
**** File 2) MFNTRP.SAI[MF,DRF]/6P/76L
2)					ELSEC outstr(inbuf[1 to ∞-1]);
2)					begin string s; s←inchwl;
***************


**** File 1) MFNTRP.SAI[MF,DEK]/6P/81L
1)					ENDTENEX
1)					end;
**** File 2) MFNTRP.SAI[MF,DRF]/6P/80L
2)					ENDC
2)					end;
***************

  1) MFNTRP.SAI[MF,DEK] and 2) MFNTRP.SAI[MF,DRF]	1-22-81 11:13	pages 6,6


**** File 1) MFNTRP.SAI[MF,DEK]/11P/39L
1)	IFWAITS seed←call(0,"ACCTIM") # date and time of day; ENDWAITS
1)	IFTENEX seed←gtad # date and time of day; ENDTENEX
1)	nsave←0.0 # initialize the random-number generator;
**** File 2) MFNTRP.SAI[MF,DRF]/11P/39L
2)	IFWAITS seed←call(0,"ACCTIM") # date and time of day;
2)	ELSEC seed←gtad # date and time of day; ENDC
2)	nsave←0.0 # initialize the random-number generator;
***************